<% Response.Buffer = true Response.ExpiresAbsolute=now()-1 Response.Expires=0 Response.CacheControl="no-cache" %> <% if Chkrequest(request("id")) then id=request("id") else Response.Redirect ("../login/chklogin.asp?login=4") end if %> <%=webname%>

" else do while not rs.eof %>
<% sql="select top 20 trustadv.*,corporation.name,corporation.trust_score from trustadv,corporation where trustadv.bprid="&id&" and corporation.id=trustadv.pjrid order by trustadv.id desc" set rs=conn.execute(sql) if rs.eof then response.write"
暂无其他诚信通会员对该会员的评价
  评价人:<%=rs("name")%> 多乐指数:<%=rs("trust_score")%> 身份:<%=rs("role")%>
  评价性质: <%=rs("type")%>   评价时间:(<%=rs("dateandtime")%>)
  评价内容: <%=rs("content")%>

<% rs.movenext loop end if rs.close set rs=nothing %>